function paranames = rsts_pnames(msel)
% DSGE_PNAMES(MSEL)
% makes a vector of parameter names according to msel
%
% upadted  : 07/06/2005
% modified : 05/17/2006 


%parameter names 
 if msel == 0   
      paranames = str2mat( ...
				'\alpha','\gamma','\beta','\kappa','\tau', ...
				'\rho_{a}','\rho_{f}','\rho_{i}','\sigma_{a}','\sigma_{f}', ...
				'\sigma_{i}',  'g_{y}','ln A_{0}', 'yst','ln P_0','\sigma_{p}');
 
 elseif msel == 1 
    paranames = str2mat( ...
				'\alpha_1','\alpha_2','\gamma_1','\gamma_2','\beta','\kappa','\tau', ...
				'\rho_{a}','\rho_{f}','\rho_{i}','\sigma_{a}','\sigma_{f}', ...
				'\sigma_{i}', '\pi^{ss}', 'g_{y}','ln A_{0}', 'yst','p_{11}','p_{22}');
 
 elseif msel == 2 
              paranames = str2mat( ...
				'\alpha','\gamma','\beta','\kappa','\tau', ...
				'\rho_{a}','\rho_{f}','\rho_{i}','\sigma_{a,1}','\sigma_{f,1}', ...
				'\sigma_{i,1}','\sigma_{a,2}', '\sigma_{f,2}','\sigma_{i,2}','\pi^{ss}', ...
                            'g_{y}','ln A_{0}', 'yst','p_{11}', 'p_{22}');   
 elseif msel == 4 
             paranames = str2mat( ...
				'\alpha_1','\alpha_2','\gamma_1','\gamma_2','\beta','\kappa','\tau', ...
				'\rho_{a}','\rho_{f}','\rho_{i}','\sigma_{a,1}','\sigma_{f,1}', ...
				'\sigma_{i,1}','\sigma_{a,2}','\sigma_{f,2}','\sigma_{i,2}','\pi^{ss}', 'g_{y}','ln A_{0}', ...
                            'yst','p_{11}','p_{22}','q_{11}','q_{22}');    
      
  
      
 elseif msel == 5  
           paranames = str2mat( ...
				'\alpha_1','\alpha_2','\gamma_1','\gamma_2','\beta','\kappa','\tau', ...
				'\rho_{a}','\rho_{f}','\rho_{i}','\sigma_{a,1}','\sigma_{f,1}', ...
				'\sigma_{i,1}','\sigma_{a,2}','\sigma_{f,2}','\sigma_{i,2}', 'g_{y}','ln A_{0}', ...
                     'yst','p_{11}','p_{22}','q_{11}','q_{22}','ln P_0','sigma_{p}');   
 end 
